home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-04 / ddj0492.zip / HANDPRIN.URC / TestLab.app .rsrc / CODE_4.txt < prev    next >
Text File  |  1992-03-11  |  24KB  |  444 lines
  1. # near model CODE resource
  2. # entry label at 0x0000
  3. export_57:
  4. entry:
  5. 00000000  225F                     movea.l    A1, [A7]+
  6. 00000002  205F                     movea.l    A0, [A7]+
  7. 00000004  A025                     trap       GetHandleSize
  8. 00000006  2E80                     move.l     [A7], D0
  9. 00000008  6A02                     bpl        +0x4 /* 0000000C */
  10. 0000000A  4297                     clr.l      [A7]
  11. label0000000C:
  12. 0000000C  4ED1                     jmp        [A1]
  13. export_58:
  14. 0000000E  7018                     moveq.l    D0, 0x18
  15. label00000010:
  16. 00000010  4267                     clr.w      -[A7]
  17. 00000012  51C8 FFFC                dbf        D0, -0x6 /* 00000010 */
  18. 00000016  2F6F 003A 0012           move.l     [A7 + 0x12], [A7 + 0x3A]
  19. 0000001C  204F                     movea.l    A0, A7
  20. 0000001E  A000                     trap       Open/PBHOpen/HOpen
  21. 00000020  206F 0036                movea.l    A0, [A7 + 0x36]
  22. 00000024  30AF 0018                move.w     [A0], [A7 + 0x18]
  23. 00000028  206F 0032                movea.l    A0, [A7 + 0x32]
  24. 0000002C  4FEF 003E                lea.l      A7, [A7 + 0x3E]
  25. 00000030  3E80                     move.w     [A7], D0
  26. 00000032  4ED0                     jmp        [A0]
  27. export_59:
  28. 00000034  4E56 FFCE                link       A6, -0x0032
  29. 00000038  204F                     movea.l    A0, A7
  30. 0000003A  316E 000E 0018           move.w     [A0 + 0x18], [A6 + 0xE]
  31. 00000040  316E 000C 001A           move.w     [A0 + 0x1A], [A6 + 0xC]
  32. 00000046  A005                     trap       Status
  33. 00000048  3D40 0010                move.w     [A6 + 0x10], D0
  34. 0000004C  41EE FFEA                lea.l      A0, [A6 - 0x16]
  35. 00000050  226E 0008                movea.l    A1, [A6 + 0x8]
  36. 00000054  7016                     moveq.l    D0, 0x16
  37. 00000056  A02E                     trap       BlockMove/BlockMoveData
  38. 00000058  4E5E                     unlink     A6
  39. 0000005A  225F                     movea.l    A1, [A7]+
  40. 0000005C  508F                     addq.l     A7, 8
  41. 0000005E  4ED1                     jmp        [A1]
  42. 00000060  4E56 0000                link       A6, 0
  43. 00000064  7014                     moveq.l    D0, 0x14
  44. 00000066  C0EE 0008                mulu.w     D0, [A6 + 0x8]
  45. 0000006A  2F00                     move.l     -[A7], D0
  46. 0000006C  4EAD 01C2                jsr        [A5 + 0x1C2]
  47. 00000070  2B40 FF78                move.l     [A5 - 0x88], D0
  48. 00000074  588F                     addq.l     A7, 4
  49. 00000076  6706                     beq        +0x8 /* 0000007E */
  50. 00000078  3B6E 0008 FF84           move.w     [A5 - 0x7C], [A6 + 0x8]
  51. label0000007E:
  52. 0000007E  7000                     moveq.l    D0, 0x00
  53. 00000080  302E 000A                move.w     D0, [A6 + 0xA]
  54. 00000084  E988                     lsl        D0, 4
  55. 00000086  2F00                     move.l     -[A7], D0
  56. 00000088  4EAD 01C2                jsr        [A5 + 0x1C2]
  57. 0000008C  2B40 FF7C                move.l     [A5 - 0x84], D0
  58. 00000090  588F                     addq.l     A7, 4
  59. 00000092  6706                     beq        +0x8 /* 0000009A */
  60. 00000094  3B6E 000A FF86           move.w     [A5 - 0x7A], [A6 + 0xA]
  61. label0000009A:
  62. 0000009A  3B7C 0001 FF74           move.w     [A5 - 0x8C], 0x1
  63. 000000A0  4E5E                     unlink     A6
  64. 000000A2  4E75                     rts
  65. 000000A4  4E56 FFFA                link       A6, -0x0006
  66. 000000A8  48E7 0018                movem.l    -[A7], A3,A4
  67. 000000AC  4A6D FF74                tst.w      [A5 - 0x8C]
  68. 000000B0  6700 00A8                beq        +0xAA /* 0000015A */
  69. 000000B4  302D FF82                move.w     D0, [A5 - 0x7E]
  70. 000000B8  B06D FF86                cmp.w      D0, [A5 - 0x7A]
  71. 000000BC  6400 009C                bcc        +0x9E /* 0000015A */
  72. 000000C0  4EBA 033C                jsr        [PC + 0x33C /* 000003FE */]
  73. 000000C4  2D40 FFFC                move.l     [A6 - 0x4], D0
  74. 000000C8  3D6D FF76 FFFA           move.w     [A6 - 0x6], [A5 - 0x8A]
  75. 000000CE  426D FF76                clr.w      [A5 - 0x8A]
  76. 000000D2  426D FF74                clr.w      [A5 - 0x8C]
  77. 000000D6  2F2E 0008                move.l     -[A7], [A6 + 0x8]
  78. 000000DA  4EBA 00E0                jsr        [PC + 0xE0 /* 000001BC */]
  79. 000000DE  588F                     addq.l     A7, 4
  80. 000000E0  2840                     movea.l    A4, D0
  81. 000000E2  200C                     move.l     D0, A4
  82. 000000E4  675A                     beq        +0x5C /* 00000140 */
  83. 000000E6  4A6E FFFA                tst.w      [A6 - 0x6]
  84. 000000EA  6718                     beq        +0x1A /* 00000104 */
  85. 000000EC  2F2E 0008                move.l     -[A7], [A6 + 0x8]
  86. 000000F0  486D FF88                pea.l      [A5 - 0x78]
  87. 000000F4  3F2D FF82                move.w     -[A7], [A5 - 0x7E]
  88. 000000F8  486D FF8A                pea.l      [A5 - 0x76]
  89. 000000FC  4EAD 014A                jsr        [A5 + 0x14A]
  90. 00000100  4FEF 000E                lea.l      A7, [A7 + 0xE]
  91. label00000104:
  92. 00000104  52AC 0004                addq.l     [A4 + 0x4], 1
  93. 00000108  302D FF82                move.w     D0, [A5 - 0x7E]
  94. 0000010C  526D FF82                addq.w     [A5 - 0x7E], 1
  95. 00000110  7200                     moveq.l    D1, 0x00
  96. 00000112  3200                     move.w     D1, D0
  97. 00000114  E989                     lsl        D1, 4
  98. 00000116  D2AD FF7C                add.l      D1, [A5 - 0x84]
  99. 0000011A  2641                     movea.l    A3, D1
  100. 0000011C  268C                     move.l     [A3], A4
  101. 0000011E  2056                     movea.l    A0, [A6]
  102. 00000120  2768 0004 0004           move.l     [A3 + 0x4], [A0 + 0x4]
  103. 00000126  43FA 0026                lea.l      A1, [PC + 0x26 /* 0000014E */]
  104. 0000012A  2149 0004                move.l     [A0 + 0x4], A1
  105. 0000012E  276E FFFC 0008           move.l     [A3 + 0x8], [A6 - 0x4]
  106. 00000134  4EBA 02C8                jsr        [PC + 0x2C8 /* 000003FE */]
  107. 00000138  90AE FFFC                sub.l      D0, [A6 - 0x4]
  108. 0000013C  2740 000C                move.l     [A3 + 0xC], D0
  109. label00000140:
  110. 00000140  3B7C 0001 FF74           move.w     [A5 - 0x8C], 0x1
  111. 00000146  3B6E FFFA FF76           move.w     [A5 - 0x8A], [A6 - 0x6]
  112. 0000014C  600C                     bra        +0xE /* 0000015A */
  113. 0000014E  2F00                     move.l     -[A7], D0
  114. 00000150  4EBA 0010                jsr        [PC + 0x10 /* 00000162 */]
  115. 00000154  2040                     movea.l    A0, D0
  116. 00000156  201F                     move.l     D0, [A7]+
  117. 00000158  4ED0                     jmp        [A0]
  118. label0000015A:
  119. 0000015A  4CDF 1800                movem.l    A4,A3, [A7]+
  120. 0000015E  4E5E                     unlink     A6
  121. 00000160  4E75                     rts
  122. fn00000162:
  123. 00000162  48E7 0318                movem.l    -[A7], D6,D7,A3,A4
  124. 00000166  536D FF82                subq.w     [A5 - 0x7E], 1
  125. 0000016A  7000                     moveq.l    D0, 0x00
  126. 0000016C  302D FF82                move.w     D0, [A5 - 0x7E]
  127. 00000170  E988                     lsl        D0, 4
  128. 00000172  D0AD FF7C                add.l      D0, [A5 - 0x84]
  129. 00000176  2840                     movea.l    A4, D0
  130. 00000178  2654                     movea.l    A3, [A4]
  131. 0000017A  4EBA 0282                jsr        [PC + 0x282 /* 000003FE */]
  132. 0000017E  90AC 0008                sub.l      D0, [A4 + 0x8]
  133. 00000182  2E00                     move.l     D7, D0
  134. 00000184  2C07                     move.l     D6, D7
  135. 00000186  9CAC 000C                sub.l      D6, [A4 + 0xC]
  136. 0000018A  4A86                     tst.l      D6
  137. 0000018C  6C02                     bge        +0x4 /* 00000190 */
  138. 0000018E  7C00                     moveq.l    D6, 0x00
  139. label00000190:
  140. 00000190  BCAB 0010                cmp.l      D6, [A3 + 0x10]
  141. 00000194  6F04                     ble        +0x6 /* 0000019A */
  142. 00000196  2746 0010                move.l     [A3 + 0x10], D6
  143. label0000019A:
  144. 0000019A  BCAB 000C                cmp.l      D6, [A3 + 0xC]
  145. 0000019E  6C04                     bge        +0x6 /* 000001A4 */
  146. 000001A0  2746 000C                move.l     [A3 + 0xC], D6
  147. label000001A4:
  148. 000001A4  DDAB 0008                add.l      [A3 + 0x8], D6
  149. 000001A8  4A6D FF82                tst.w      [A5 - 0x7E]
  150. 000001AC  6704                     beq        +0x6 /* 000001B2 */
  151. 000001AE  DFAC FFFC                add.l      [A4 - 0x4], D7
  152. label000001B2:
  153. 000001B2  202C 0004                move.l     D0, [A4 + 0x4]
  154. 000001B6  4CDF 18C0                movem.l    A4,A3,D7,D6, [A7]+
  155. 000001BA  4E75                     rts
  156. fn000001BC:
  157. 000001BC  4E56 0000                link       A6, 0
  158. 000001C0  48E7 0738                movem.l    -[A7], D5,D6,D7,A2,A3,A4
  159. 000001C4  286E 0008                movea.l    A4, [A6 + 0x8]
  160. 000001C8  7E00                     moveq.l    D7, 0x00
  161. 000001CA  3A2D FF80                move.w     D5, [A5 - 0x80]
  162. 000001CE  4A45                     tst.w      D5
  163. 000001D0  6632                     bne        +0x34 /* 00000204 */
  164. 000001D2  486D 01DA                pea.l      [A5 + 0x1DA]
  165. 000001D6  4EAD 00E2                jsr        [A5 + 0xE2]
  166. 000001DA  588F                     addq.l     A7, 4
  167. 000001DC  6026                     bra        +0x28 /* 00000204 */
  168. label000001DE:
  169. 000001DE  3C05                     move.w     D6, D5
  170. 000001E0  DC47                     add.w      D6, D7
  171. 000001E2  5346                     subq.w     D6, 1
  172. 000001E4  E24E                     lsr        D6.w, 1
  173. 000001E6  7014                     moveq.l    D0, 0x14
  174. 000001E8  C0C6                     mulu.w     D0, D6
  175. 000001EA  D0AD FF78                add.l      D0, [A5 - 0x88]
  176. 000001EE  2640                     movea.l    A3, D0
  177. 000001F0  B9D3                     cmpa.l     A4, [A3]
  178. 000001F2  6604                     bne        +0x6 /* 000001F8 */
  179. 000001F4  200B                     move.l     D0, A3
  180. 000001F6  607C                     bra        +0x7E /* 00000274 */
  181. label000001F8:
  182. 000001F8  B9D3                     cmpa.l     A4, [A3]
  183. 000001FA  6404                     bcc        +0x6 /* 00000200 */
  184. 000001FC  3A06                     move.w     D5, D6
  185. 000001FE  6004                     bra        +0x6 /* 00000204 */
  186. label00000200:
  187. 00000200  7E01                     moveq.l    D7, 0x01
  188. 00000202  DE46                     add.w      D7, D6
  189. label00000204:
  190. 00000204  BA47                     cmp.w      D5, D7
  191. 00000206  62D6                     bhi        -0x28 /* 000001DE */
  192. 00000208  302D FF80                move.w     D0, [A5 - 0x80]
  193. 0000020C  B06D FF84                cmp.w      D0, [A5 - 0x7C]
  194. 00000210  6604                     bne        +0x6 /* 00000216 */
  195. 00000212  7000                     moveq.l    D0, 0x00
  196. 00000214  605E                     bra        +0x60 /* 00000274 */
  197. label00000216:
  198. 00000216  7014                     moveq.l    D0, 0x14
  199. 00000218  C0C7                     mulu.w     D0, D7
  200. 0000021A  D0AD FF78                add.l      D0, [A5 - 0x88]
  201. 0000021E  2640                     movea.l    A3, D0
  202. 00000220  302D FF80                move.w     D0, [A5 - 0x80]
  203. 00000224  9047                     sub.w      D0, D7
  204. 00000226  C0FC                     mulu.w     D0, 0xFFFFFFFFFFFFFFFF
  205. 00000228  0014 2F00                ori.b      [A4], 0x0
  206. 0000022C  2F0B                     move.l     -[A7], A3
  207. 0000022E  486B 0014                pea.l      [A3 + 0x14]
  208. 00000232  4EAD 015A                jsr        [A5 + 0x15A]
  209. 00000236  268C                     move.l     [A3], A4
  210. 00000238  42AB 0010                clr.l      [A3 + 0x10]
  211. 0000023C  42AB 0008                clr.l      [A3 + 0x8]
  212. 00000240  42AB 0004                clr.l      [A3 + 0x4]
  213. 00000244  277C 7FFF FFFF 000C      move.l     [A3 + 0xC], 0x7FFFFFFF
  214. 0000024C  526D FF80                addq.w     [A5 - 0x80], 1
  215. 00000250  246D FF7C                movea.l    A2, [A5 - 0x84]
  216. 00000254  3A2D FF82                move.w     D5, [A5 - 0x7E]
  217. 00000258  4FEF 000C                lea.l      A7, [A7 + 0xC]
  218. 0000025C  600C                     bra        +0xE /* 0000026A */
  219. label0000025E:
  220. 0000025E  B7D2                     cmpa.l     A3, [A2]
  221. 00000260  6204                     bhi        +0x6 /* 00000266 */
  222. 00000262  7014                     moveq.l    D0, 0x14
  223. 00000264  D192                     add.l      [A2], D0
  224. label00000266:
  225. 00000266  45EA 0010                lea.l      A2, [A2 + 0x10]
  226. label0000026A:
  227. 0000026A  3005                     move.w     D0, D5
  228. 0000026C  5345                     subq.w     D5, 1
  229. 0000026E  4A40                     tst.w      D0
  230. 00000270  66EC                     bne        -0x12 /* 0000025E */
  231. 00000272  200B                     move.l     D0, A3
  232. label00000274:
  233. 00000274  4CDF 1CE0                movem.l    A4,A3,A2,D7,D6,D5, [A7]+
  234. 00000278  4E5E                     unlink     A6
  235. 0000027A  4E75                     rts
  236. fn0000027C:
  237. 0000027C  4E56 FFF0                link       A6, -0x0010
  238. 00000280  48E7 0F08                movem.l    -[A7], D4,D5,D6,D7,A4
  239. 00000284  3E2D FF74                move.w     D7, [A5 - 0x8C]
  240. 00000288  3C2D FF76                move.w     D6, [A5 - 0x8A]
  241. 0000028C  7800                     moveq.l    D4, 0x00
  242. 0000028E  426D FF76                clr.w      [A5 - 0x8A]
  243. 00000292  426D FF74                clr.w      [A5 - 0x8C]
  244. 00000296  486D FF92                pea.l      [A5 - 0x6E]
  245. 0000029A  486D FF9C                pea.l      [A5 - 0x64]
  246. 0000029E  4EAD 014A                jsr        [A5 + 0x14A]
  247. 000002A2  286D FF78                movea.l    A4, [A5 - 0x88]
  248. 000002A6  3A2D FF80                move.w     D5, [A5 - 0x80]
  249. 000002AA  508F                     addq.l     A7, 8
  250. 000002AC  6008                     bra        +0xA /* 000002B6 */
  251. label000002AE:
  252. 000002AE  D8AC 0008                add.l      D4, [A4 + 0x8]
  253. 000002B2  49EC 0014                lea.l      A4, [A4 + 0x14]
  254. label000002B6:
  255. 000002B6  3005                     move.w     D0, D5
  256. 000002B8  5345                     subq.w     D5, 1
  257. 000002BA  4A40                     tst.w      D0
  258. 000002BC  66F0                     bne        -0xE /* 000002AE */
  259. 000002BE  286D FF78                movea.l    A4, [A5 - 0x88]
  260. 000002C2  3A2D FF80                move.w     D5, [A5 - 0x80]
  261. 000002C6  6000 009C                bra        +0x9E /* 00000364 */
  262. label000002CA:
  263. 000002CA  2F2C 0004                move.l     -[A7], [A4 + 0x4]
  264. 000002CE  4A84                     tst.l      D4
  265. 000002D0  674C                     beq        +0x4E /* 0000031E */
  266. 000002D2  487A 00AA                pea.l      [PC + 0xAA /* 0000037E */]
  267. 000002D6  486E FFF6                pea.l      [A6 - 0xA]
  268. 000002DA  3F3C 200E                move.w     -[A7], 0x200E
  269. 000002DE  A9EB                     trap       Pack4/FP68K
  270. 000002E0  486C 0008                pea.l      [A4 + 0x8]
  271. 000002E4  486E FFF6                pea.l      [A6 - 0xA]
  272. 000002E8  3F3C 2804                move.w     -[A7], 0x2804
  273. 000002EC  A9EB                     trap       Pack4/FP68K
  274. 000002EE  2D44 FFF2                move.l     [A6 - 0xE], D4
  275. 000002F2  486E FFF2                pea.l      [A6 - 0xE]
  276. 000002F6  486E FFF6                pea.l      [A6 - 0xA]
  277. 000002FA  3F3C 2806                move.w     -[A7], 0x2806
  278. 000002FE  A9EB                     trap       Pack4/FP68K
  279. 00000300  486E FFF6                pea.l      [A6 - 0xA]
  280. 00000304  3F3C 0016                move.w     -[A7], 0x16
  281. 00000308  A9EB                     trap       Pack4/FP68K
  282. 0000030A  486E FFF6                pea.l      [A6 - 0xA]
  283. 0000030E  486E FFF0                pea.l      [A6 - 0x10]
  284. 00000312  3F3C 2010                move.w     -[A7], 0x2010
  285. 00000316  A9EB                     trap       Pack4/FP68K
  286. 00000318  302E FFF0                move.w     D0, [A6 - 0x10]
  287. 0000031C  6002                     bra        +0x4 /* 00000320 */
  288. label0000031E:
  289. 0000031E  7000                     moveq.l    D0, 0x00
  290. label00000320:
  291. 00000320  3F00                     move.w     -[A7], D0
  292. 00000322  4AAC 0004                tst.l      [A4 + 0x4]
  293. 00000326  670E                     beq        +0x10 /* 00000336 */
  294. 00000328  2F2C 0004                move.l     -[A7], [A4 + 0x4]
  295. 0000032C  2F2C 0008                move.l     -[A7], [A4 + 0x8]
  296. 00000330  4EAD 005A                jsr        [A5 + 0x5A]
  297. 00000334  6002                     bra        +0x4 /* 00000338 */
  298. label00000336:
  299. 00000336  7000                     moveq.l    D0, 0x00
  300. label00000338:
  301. 00000338  2F00                     move.l     -[A7], D0
  302. 0000033A  2F2C 0010                move.l     -[A7], [A4 + 0x10]
  303. 0000033E  0CAC 7FFF FFFF 000C      cmpi.l     [A4 + 0xC], 0x7FFFFFFF
  304. 00000346  6604                     bne        +0x6 /* 0000034C */
  305. 00000348  7000                     moveq.l    D0, 0x00
  306. 0000034A  6004                     bra        +0x6 /* 00000350 */
  307. label0000034C:
  308. 0000034C  202C 000C                move.l     D0, [A4 + 0xC]
  309. label00000350:
  310. 00000350  2F00                     move.l     -[A7], D0
  311. 00000352  2F14                     move.l     -[A7], [A4]
  312. 00000354  486D FFD0                pea.l      [A5 - 0x30]
  313. 00000358  4EAD 014A                jsr        [A5 + 0x14A]
  314. 0000035C  4FEF 001A                lea.l      A7, [A7 + 0x1A]
  315. 00000360  49EC 0014                lea.l      A4, [A4 + 0x14]
  316. label00000364:
  317. 00000364  3005                     move.w     D0, D5
  318. 00000366  5345                     subq.w     D5, 1
  319. 00000368  4A40                     tst.w      D0
  320. 0000036A  6600 FF5E                bne        -0xA0 /* 000002CA */
  321. 0000036E  3B47 FF74                move.w     [A5 - 0x8C], D7
  322. 00000372  3B46 FF76                move.w     [A5 - 0x8A], D6
  323. 00000376  4CDF 10F0                movem.l    A4,D7,D6,D5,D4, [A7]+
  324. 0000037A  4E5E                     unlink     A6
  325. 0000037C  4E75                     rts
  326. 0000037E  0064 426D                ori.w      -[A4], 0x426D /* 'Bm' */
  327. export_55: // at 00000380 (misaligned)
  328. 00000382  FF76                     .extension 0xF76 // unimplemented
  329. 00000384  426D FF74                clr.w      [A5 - 0x8C]
  330. 00000388  486D 01E2                pea.l      [A5 + 0x1E2]
  331. 0000038C  4878 0014                pea.l      [0x00000014 /* __m68k_vec_div_zero__ */]
  332. 00000390  7000                     moveq.l    D0, 0x00
  333. 00000392  302D FF80                move.w     D0, [A5 - 0x80]
  334. 00000396  2F00                     move.l     -[A7], D0
  335. 00000398  2F2D FF78                move.l     -[A7], [A5 - 0x88]
  336. 0000039C  4EAD 0172                jsr        [A5 + 0x172]
  337. 000003A0  4EBA FEDA                jsr        [PC - 0x126 /* 0000027C */]
  338. 000003A4  4FEF 0010                lea.l      A7, [A7 + 0x10]
  339. 000003A8  4E75                     rts
  340. export_56:
  341. 000003AA  4E56 0000                link       A6, 0
  342. 000003AE  48E7 0718                movem.l    -[A7], D5,D6,D7,A3,A4
  343. 000003B2  286E 0008                movea.l    A4, [A6 + 0x8]
  344. 000003B6  266E 000C                movea.l    A3, [A6 + 0xC]
  345. 000003BA  2054                     movea.l    A0, [A4]
  346. 000003BC  7E00                     moveq.l    D7, 0x00
  347. 000003BE  1E10                     move.b     D7, [A0]
  348. 000003C0  2053                     movea.l    A0, [A3]
  349. 000003C2  7C00                     moveq.l    D6, 0x00
  350. 000003C4  1C10                     move.b     D6, [A0]
  351. 000003C6  BC47                     cmp.w      D6, D7
  352. 000003C8  6F04                     ble        +0x6 /* 000003CE */
  353. 000003CA  3007                     move.w     D0, D7
  354. 000003CC  6002                     bra        +0x4 /* 000003D0 */
  355. label000003CE:
  356. 000003CE  3006                     move.w     D0, D6
  357. label000003D0:
  358. 000003D0  3040                     movea.w    A0, D0
  359. 000003D2  2F08                     move.l     -[A7], A0
  360. 000003D4  2053                     movea.l    A0, [A3]
  361. 000003D6  4868 0001                pea.l      [A0 + 0x1]
  362. 000003DA  2054                     movea.l    A0, [A4]
  363. 000003DC  4868 0001                pea.l      [A0 + 0x1]
  364. 000003E0  4EAD 0192                jsr        [A5 + 0x192]
  365. 000003E4  3A00                     move.w     D5, D0
  366. 000003E6  4A45                     tst.w      D5
  367. 000003E8  4FEF 000C                lea.l      A7, [A7 + 0xC]
  368. 000003EC  6704                     beq        +0x6 /* 000003F2 */
  369. 000003EE  3005                     move.w     D0, D5
  370. 000003F0  6004                     bra        +0x6 /* 000003F6 */
  371. label000003F2:
  372. 000003F2  3007                     move.w     D0, D7
  373. 000003F4  9046                     sub.w      D0, D6
  374. label000003F6:
  375. 000003F6  4CDF 18E0                movem.l    A4,A3,D7,D6,D5, [A7]+
  376. 000003FA  4E5E                     unlink     A6
  377. 000003FC  4E75                     rts
  378. fn000003FE:
  379. 000003FE  4A2D FFFE                tst.b      [A5 - 0x2]
  380. 00000402  6604                     bne        +0x6 /* 00000408 */
  381. 00000404  4EBA 0034                jsr        [PC + 0x34 /* 0000043A */]
  382. label00000408:
  383. 00000408  2078 01D4                movea.l    A0, [0x000001D4 /* VIA */]
  384. 0000040C  1B68 0A00 FFF6           move.b     [A5 - 0xA], [A0 + 0xA00]
  385. 00000412  2078 01D4                movea.l    A0, [0x000001D4 /* VIA */]
  386. 00000416  1B68 0800 FFF7           move.b     [A5 - 0x9], [A0 + 0x800]
  387. 0000041C  2078 01D4                movea.l    A0, [0x000001D4 /* VIA */]
  388. 00000420  102D FFF6                move.b     D0, [A5 - 0xA]
  389. 00000424  B028 0A00                cmp.b      D0, [A0 + 0xA00]
  390. 00000428  66DE                     bne        -0x20 /* 00000408 */
  391. 0000042A  302D FFF6                move.w     D0, [A5 - 0xA]
  392. 0000042E  4640                     not.w      D0
  393. 00000430  3B40 FFF4                move.w     [A5 - 0xC], D0
  394. 00000434  202D FFF2                move.l     D0, [A5 - 0xE]
  395. 00000438  4E75                     rts
  396. fn0000043A:
  397. 0000043A  2078 01D4                movea.l    A0, [0x000001D4 /* VIA */]
  398. 0000043E  70FF                     moveq.l    D0, 0xFFFFFFFF
  399. 00000440  1140 0A00                move.b     [A0 + 0xA00], D0
  400. 00000444  2078 01D4                movea.l    A0, [0x000001D4 /* VIA */]
  401. 00000448  1140 0800                move.b     [A0 + 0x800], D0
  402. 0000044C  2B78 01AA FFF8           move.l     [A5 - 0x8], [0x000001AA]
  403. 00000452  2078 01D4                movea.l    A0, [0x000001D4 /* VIA */]
  404. 00000456  1B68 1C00 FFFC           move.b     [A5 - 0x4], [A0 + 0x1C00]
  405. 0000045C  41FA 0054                lea.l      A0, [PC + 0x54 /* 000004B2 */]
  406. 00000460  208D                     move.l     [A0], A5
  407. 00000462  41FA 002E                lea.l      A0, [PC + 0x2E /* 00000492 */]
  408. 00000466  21C8 01AA                move.l     [0x000001AA], A0
  409. 0000046A  2078 01D4                movea.l    A0, [0x000001D4 /* VIA */]
  410. 0000046E  117C 00C0 1C00           move.b     [A0 + 0x1C00], 0xC0
  411. 00000474  1B7C 0001 FFFE           move.b     [A5 - 0x2], 0x1
  412. 0000047A  4A2D FFFF                tst.b      [A5 - 0x1]
  413. 0000047E  6636                     bne        +0x38 /* 000004B6 */
  414. 00000480  486D 01D2                pea.l      [A5 + 0x1D2]
  415. 00000484  4EAD 00F2                jsr        [A5 + 0xF2]
  416. 00000488  588F                     addq.l     A7, 4
  417. 0000048A  1B7C 0001 FFFF           move.b     [A5 - 0x1], 0x1
  418. 00000490  6024                     bra        +0x26 /* 000004B6 */
  419. 00000492  2F0D                     move.l     -[A7], A5
  420. 00000494  2A7A 001C                movea.l    A5, [PC + 0x1C /* 000004B2 */]
  421. 00000498  526D FFF2                addq.w     [A5 - 0xE], 1
  422. 0000049C  2078 01D4                movea.l    A0, [0x000001D4 /* VIA */]
  423. 000004A0  70FF                     moveq.l    D0, 0xFFFFFFFF
  424. 000004A2  1140 0A00                move.b     [A0 + 0xA00], D0
  425. 000004A6  2078 01D4                movea.l    A0, [0x000001D4 /* VIA */]
  426. 000004AA  1140 0800                move.b     [A0 + 0x800], D0
  427. 000004AE  2A5F                     movea.l    A5, [A7]+
  428. 000004B0  4E75                     rts
  429. 000004B2  0000 0000                ori.b      D0, 0x0
  430. label000004B6:
  431. 000004B6  4E75                     rts
  432. export_54:
  433. 000004B8  4A2D FFFE                tst.b      [A5 - 0x2]
  434. 000004BC  671C                     beq        +0x1E /* 000004DA */
  435. 000004BE  082D 0006 FFFC           btst.b     [A5 - 0x4], 0x6
  436. 000004C4  660A                     bne        +0xC /* 000004D0 */
  437. 000004C6  2078 01D4                movea.l    A0, [0x000001D4 /* VIA */]
  438. 000004CA  117C 0040 1C00           move.b     [A0 + 0x1C00], 0x40 /* '@' */
  439. label000004D0:
  440. 000004D0  21ED FFF8 01AA           move.l     [0x000001AA], [A5 - 0x8]
  441. 000004D6  422D FFFE                clr.b      [A5 - 0x2]
  442. label000004DA:
  443. 000004DA  4E75                     rts
  444.